Page 1

This is an example. As you can see, flexdashboard can have text annotations.

Column1

Gauge ex1. Contact Rate

Gauge ex2. Average Rating

Text Annotation

One of the dashboard section can be used as a text area. Markdown Grammers can be helpful here. It is not that difficult. Just have a try.

Column2

Page 2

ggplot2 chart 1

---
title: "Multiple Pages"
output: 
  flexdashboard::flex_dashboard:
    orientation: columns
    source_code: embed
    navbar :
      - { title: "About", href: "https://example.com/about", align: right }
      - { icon: "fa-pencil", href: "https://www.naver.com", align: right}
---

Page 1
=============================================

This is an example. As you can see, flexdashboard can have text annotations.

```{r setup, include=FALSE}
library(flexdashboard)
library(ggplot2)
library(knitr)
```

Column1
-----------------------------------------------------------------------
### Gauge ex1. Contact Rate

```{r}
gauge(35, min = 0, max = 100, symbol = '%',
      sectors = gaugeSectors(success = c(80, 100),
                             warning = c(40, 79),
                             danger = c(0, 39)
))

```

### Gauge ex2. Average Rating 

```{r}
rating = 42
gauge(rating, 0, 50, label = 'Test', gaugeSectors(
  success = c(41, 50), warning = c(21, 40), danger = c(0, 20)
))

```

### Text Annotation

One of the dashboard section can be used as a text area.
Markdown Grammers can be helpful here.
It is not that difficult.
Just have a try. 

Column2
-----------------------------------------------------------------------

Page 2 {data-orientation=rows}
=====================================================================

### ggplot2 chart 1

```{r}
ggplot(data=mtcars, aes(x=hp, y=mpg, color=as.factor(cyl))) +
  geom_point() +
  theme(legend.position="blank")

```